program savemeqslng;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Interfaces, // this includes the LCL widgetset
  Forms, unit_FormMain, sysutils, unit_eQSLutils, unit_Utils, unit_FormSplash
  { you can add units after this };

{$R *.res}

begin
 Application.Initialize;

 FormSplash:=TFormSplash.Create(nil);
 FormSplash.Update;
  Application.CreateForm(TFormMain, FormMain);
 FormSplash.Show;
 Application.Initialize; //this line exists!
 Sleep(2000);
 FormSplash.Free;
 Application.Run;
end.

